1 REM=-=-=-=-=-=-=-=-=-=-=
2 REM=   SPRITE LOADER   =
3 REM=-=-=-=-=-=-=-=-=-=-=
10 INPUT"LOAD WHICH SPRITE FILE";FL$
20 INPUT"WHICH MEMORY BLOCK (192..199)";BK
30 MEM=64*BK
40 OPEN 8,8,8,"0:"+FL$+",S,R"
45 REM>> FOR TAPE, REPLACE
46 REM>> LINE 40 WITH THIS:
47 REM>>   OPEN 8,1,0,FL$
50 FOR N=1 TO 63
60 INPUT#8,TTL
70 PRINT TTL,
80 POKE MEM,TTL : MEM=MEM+1
90 NEXT N
100 CLOSE 8